.d ::"DEMO USE OF 'STRING SWAP' ROUTINE" Zn A$(20):(4)"BLOAD B.STRING.SWAP":768 xx I120:A$(I)::P1:200 	 AMES,BURKE,PUTNEY,LEE,LEVY,RAMSDELL,BISHOP,RANDALL,LANDSMAN,LEIPER,OSLISLO,KOVACS,MEADOR,KRIEGSMAN,MERCIER,WHITE,LEVY,BLACK,SCHORNAK,STITT 	 BUBBLE SORT "	 M20 a	 MM1:SW0:I1M:A$(I1)A$(I)SW1:A$(I1),A$(I):SWAP o	 :SW160 	 P20:200: 	 3:I120:P:A$(I)::   
